In this session of GeDi you used the following data:
library("GeDi")
if(is.null(reactive_values$genesets)){
cat("It seems like you did not provide data in this session.")
}else{
DT::datatable(reactive_values$genesets, caption = "The input genesets")
}
From your initial input data, you have filtered the following genesets
if(length(reactive_values$filtered_genesets) > 0){
DT::datatable(reactive_values$filtered_genesets, caption = "The filtered genesets")
}else{
cat("It seems like you didn't filter genesets from the input data.")
}
Potentially you specified the species of your data and downloaded a Protein-Protein-Interaction (PPI) matrix.
if(is.null(input$species) || input$species == ""){
cat("It seems like you didn't specify the species of your data.")
}else{
cat("You specified the species of your data as ", input$species, sep = "")
}
## You specified the species of your data as Mus musculus
if(!is.null(reactive_values$ppi)){
DT::datatable(reactive_values$ppi, caption = "The downloaded PPI")
}else{
cat("It seems like you did not download a PPI matrix.")
}